﻿Namespace EIB.Bus.FT12
    Public NotInheritable Class FT12_FrameACK
        Inherits FT12_FrameBase

        Sub New(data As Byte())
            MyBase.New(data)
        End Sub


        Public Overrides Function ToInfoList() As List(Of InfoBase)
            Dim list As New List(Of InfoBase)

            list.Add(New Info("Type", String.Format("{0} (0x{0:X})", Type)))

            Return list
        End Function
    End Class
End Namespace